-- card: 20657 from stack: in.0-2
-- bmap block id: 44924
-- flags: 0000
-- background id: 18737
-- name: Icon Editor
----- HyperTalk script -----
on goBack
  go cd "Other tools" of stack "Intro to HyperCard 2.0"
end goBack

on closeCard
  set icon of btn id 5 to 13105
  set name of btn id 5 to "Are you finished?"
end closeCard


-- part 9 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=309 top=222 right=275 bottom=410
-- title width / last selected line: 0
-- icon id / first selected line: 29549 / 29549
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: What would you like?
----- HyperTalk script -----
on mouseUp
  answer "What would you like?" with "Coffee?" or "Cherry Pie?" or "Good book?"
  put it into theChoice
  set icon of me to theChoice
end mouseUp



-- part 5 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=212 top=222 right=275 bottom=310
-- title width / last selected line: 0
-- icon id / first selected line: 13105 / 13105
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Are you finished?
----- HyperTalk script -----
on mouseUp
  lock screen
  set icon of me to 9713
  set name of me to "YES!"
  unlock screen with wipe right
end mouseUp



-- part 4 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=154 top=222 right=275 bottom=212
-- title width / last selected line: 0
-- icon id / first selected line: 27304 / 27304
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: LetŐs dance
----- HyperTalk script -----
on mouseUp
  set cursor to none
  repeat for 2
    repeat with n = 1 to 7
      set icon of the target to ("dance" & n)
      wait 5
    end repeat
  end repeat
  set icon of the target to "dance1"
end mouseUp



-- part 1 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=68 top=219 right=277 bottom=149
-- title width / last selected line: 0
-- icon id / first selected line: 12033 / 12033
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: See Icon Editor
----- HyperTalk script -----
on mouseUp
  visual zoom out
  go cd "Icon Editor Empty" of stack "•HC 2.0-6"
end mouseUp



on mouseUp
  set cursor to none
  lock screen
  put return & "Here’s the Icon Editor with no icons in it." into cd fld "info"
  show cd fld "info"
  unlock screen with wipe right
  wait 90
  lock screen
  hide cd fld "info"
  unlock screen with wipe right
  wait 10
  show btn "editorBtn"
  PaintPict "emptyIconEditor",cd,"editorBtn"
  wait 190
  hide btn "editorBtn"

  lock screen
  put return & "Here’s the Icon Editor WITH an icon in it." into cd fld "info"
  show cd fld "info"
  unlock screen with wipe right
  wait 90
  lock screen
  hide cd fld "info"
  unlock screen with wipe right
  wait 10
  show btn "editorBtn"
  PaintPict "fullIconEditor",cd,"editorBtn"
  wait 190
  hide btn "editorBtn"
end mouseUp



-- part 2 (button)
-- low flags: 80
-- high flags: 0001
-- rect: left=81 top=41 right=323 bottom=396
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: EditorBtn
----- HyperTalk script -----
on mouseUp
  hide me
end mouseUp



-- part 3 (field)
-- low flags: 81
-- high flags: 2004
-- rect: left=64 top=120 right=256 bottom=410
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 174
-- text size: 24
-- style flags: 0
-- line height: 26
-- part name: info
----- HyperTalk script -----
on mouseUp
  hide me
end mouseUp



-- part contents for background part 1
----- text -----
HyperCard 2.0 has a built-in tool for making, copying, and modifying icons—which are buttons that can have small graphics attached to them.

Click the “See Icon Editor” option below to see how the Editor looks, then click the other options to see samples of the kinds of things you can do with icons.

-- part contents for card part 3
----- text -----

Here’s the Icon Editor WITH an icon in it.